﻿Public Class GeneralSettings
    Inherits SerializableClass

#Region "全般"
    Private _launchOnStartUp As Boolean
    Public Property LaunchOnStartup() As Boolean
        Get
            Return _launchOnStartUp
        End Get
        Set(ByVal value As Boolean)
            _launchOnStartUp = value
            OnPropertyChanged("LaunchOnStartup")
        End Set
    End Property

    Private _isInTray As Boolean
    Public Property IsInTray() As Boolean
        Get
            Return _isInTray
        End Get
        Set(ByVal value As Boolean)
            _isInTray = value
            OnPropertyChanged("IsInTray")
        End Set
    End Property
#End Region

    Public ReadOnly Property EnableNiconamaCommentViewer() As Boolean
        Get
            If NiconamaCommentViewerPath <> "" AndAlso System.IO.File.Exists(NiconamaCommentViewerPath) Then
                Return True
            Else
                Return False
            End If
        End Get
    End Property

    Private _NiconamaCommentViewerPath As String
    Public Property NiconamaCommentViewerPath() As String
        Get
            Return _NiconamaCommentViewerPath
        End Get
        Set(ByVal value As String)
            _NiconamaCommentViewerPath = value
            OnPropertyChanged("NiconamaCommentViewerPath")
            OnPropertyChanged("EnableNiconamaCommentViewer")
        End Set
    End Property

#Region "巡回"
    Private _detailsGettingEnabled As Boolean = True
    Public Property DetailsGettingEnabled() As Boolean
        Get
            Return _detailsGettingEnabled
        End Get
        Set(ByVal value As Boolean)
            _detailsGettingEnabled = value
        End Set
    End Property

    Private _interval As CrawlingInterval = CrawlingInterval.Normal
    Public Property Interval() As CrawlingInterval
        Get
            Return _interval
        End Get
        Set(ByVal value As CrawlingInterval)
            _interval = value
            OnPropertyChanged("Interval")
        End Set
    End Property
#End Region



End Class
